home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1996 April / EnigmA AMIGA RUN 06 (1996)(G.R. Edizioni)(IT)[!][issue 1996-04][Skylink CD V].iso / progs / editor / write-ed / module / searchpattern.menu < prev    next >
Text File  |  1995-05-22  |  583b  |  26 lines
  1. /*
  2.  *   $VER: SEARCHPATTERN.MENU 4.0039 (22-Mai-95)
  3.  */
  4.  
  5. VERSIONCHECK 40000 "SEARCHPATTERN.MENU"
  6.  
  7.  
  8. ITEMBAR
  9.  
  10. ITEM "Suche nach Muster ..." ""
  11.   GETSTRING "Bitte geben sie das Suchmuster ein:\n(Case)" _PATCASE 
  12.   SETVAR "_PatCase" _RS
  13.   FINDPATTERN @CURSOR @EOT {@CASE};
  14.  
  15. ITEM "Suche noch einmal" ""
  16.   FINDPATTERN @CURSOR @EOT {@CASE};
  17.  
  18. ITEM "Suche nach Muster (no Case) ..." "Ö"
  19.   GETSTRING "Bitte geben sie das Suchmuster ein:\n(No case)" _PATNOCASE 
  20.   SETVAR "_PatNoCase" _RS
  21.   FINDPATTERN @CURSOR @EOT {@NOCASE};
  22.  
  23. ITEM "Suche noch einmal" "Ä"
  24.   FINDPATTERN @CURSOR @EOT {@NOCASE};
  25.  
  26.